home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_400 / 424_02 / ED-157 / tabstop.c < prev    next >
C/C++ Source or Header  |  1993-09-10  |  1KB  |  48 lines
  1. /*
  2.  * Copyright (C) 1992 by Rush Record (rhr@clio.rice.edu)
  3.  * 
  4.  * This file is part of ED.
  5.  * 
  6.  * ED is free software; you can redistribute it and/or modify it under the terms
  7.  * of the GNU General Public License as published by the Free Software Foundation.
  8.  * 
  9.  * ED is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
  10.  * without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
  11.  * PARTICULAR PURPOSE.  See the GNU General Public License for more details.
  12.  * 
  13.  * You should have received a copy of the GNU General Public License along with ED
  14.  * (see the file COPYING).  If not, write to the Free Software Foundation, 675
  15.  * Mass Ave, Cambridge, MA 02139, USA.
  16.  */
  17. #include "opsys.h"
  18.  
  19. #include "rec.h"
  20. #include "window.h"
  21. #include "ed_dec.h"
  22.  
  23. /******************************************************************************\
  24. |Routine: tabstop
  25. |Callby: find_column get_column inquire right_arrow
  26. |Purpose: Returns the column number of the next tab stop following a given column.
  27. |Arguments:
  28. |    col is the column to start at.
  29. \******************************************************************************/
  30. Int tabstop(col)
  31. register Int col;
  32. {
  33.     register Int i,cur,lim;
  34.     register Char *c;
  35.  
  36.     cur = CUR_TAB_SETUP;
  37.     lim = TAB_LENGTH[cur];
  38.     if((i = col) >= lim)
  39.         return(col - (col & 7) + 8);
  40.     c = TAB_STRING[cur];
  41.     do
  42.     {
  43.         i++;
  44.     } while(c[i] != 't' && i < lim);
  45.     return(i);
  46. }
  47.  
  48.